home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 July / macformat-026.iso / mac / Shareware City / Developers / berkeleydb1.73 / Berkeley_db / btree / bt_search.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-07-27  |  6.3 KB  |  240 lines  |  [TEXT/MPS ]
  1. /*-
  2.  * Copyright (c) 1990, 1993
  3.  *    The Regents of the University of California.  All rights reserved.
  4.  *
  5.  * This code is derived from software contributed to Berkeley by
  6.  * Mike Olson.
  7.  *
  8.  * Redistribution and use in source and binary forms, with or without
  9.  * modification, are permitted provided that the following conditions
  10.  * are met:
  11.  * 1. Redistributions of source code must retain the above copyright
  12.  *    notice, this list of conditions and the following disclaimer.
  13.  * 2. Redistributions in binary form must reproduce the above copyright
  14.  *    notice, this list of conditions and the following disclaimer in the
  15.  *    documentation and/or other materials provided with the distribution.
  16.  * 3. All advertising materials mentioning features or use of this software
  17.  *    must display the following acknowledgement:
  18.  *    This product includes software developed by the University of
  19.  *    California, Berkeley and its contributors.
  20.  * 4. Neither the name of the University nor the names of its contributors
  21.  *    may be used to endorse or promote products derived from this software
  22.  *    without specific prior written permission.
  23.  *
  24.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34.  * SUCH DAMAGE.
  35.  */
  36.  
  37. #if defined(LIBC_SCCS) && !defined(lint)
  38. static char sccsid[] = "@(#)bt_search.c    8.4 (Berkeley) 12/10/93";
  39. #endif /* LIBC_SCCS and not lint */
  40.  
  41. #if defined(macintosh) && (defined(powerc) || defined(__powerc))
  42. #include "OurMalloc.h"
  43. #endif
  44.  
  45. #include <sys/types.h>
  46.  
  47. #include <stdio.h>
  48.  
  49. #include <db.h>
  50. #include "btree.h"
  51.  
  52. static int bt_snext __P((BTREE *, PAGE *, const DBT *, int *));
  53. static int bt_sprev __P((BTREE *, PAGE *, const DBT *, int *));
  54.  
  55. /*
  56.  * __BT_SEARCH -- Search a btree for a key.
  57.  *
  58.  * Parameters:
  59.  *    t:    tree to search
  60.  *    key:    key to find
  61.  *    exactp:    pointer to exact match flag
  62.  *
  63.  * Returns:
  64.  *    The EPG for matching record, if any, or the EPG for the location
  65.  *    of the key, if it were inserted into the tree, is entered into
  66.  *    the bt_cur field of the tree.  A pointer to the field is returned.
  67.  */
  68. EPG *
  69. __bt_search(t, key, exactp)
  70.     BTREE *t;
  71.     const DBT *key;
  72.     int *exactp;
  73. {
  74.     PAGE *h, *n;
  75.     indx_t index;
  76.     pgno_t pg;
  77.     int base, cmp, lim;
  78.  
  79.     BT_CLR(t);
  80.     for (pg = P_ROOT;;) {
  81.         if ((h = mpool_get(t->bt_mp, pg, 0)) == NULL)
  82.             return (NULL);
  83.  
  84.         /* Do a binary search on the current page. */
  85.         t->bt_cur.page = h;
  86.         for (base = 0, lim = NEXTINDEX(h); lim; lim >>= 1) {
  87.             t->bt_cur.index = index = base + (lim >> 1);
  88.             if ((cmp = __bt_cmp(t, key, &t->bt_cur)) == 0) {
  89.                 if (h->flags & P_BLEAF) {
  90.                     *exactp = 1;
  91.                     return (&t->bt_cur);
  92.                 }
  93.                 goto next;
  94.             }
  95.             if (cmp > 0) {
  96.                 base = index + 1;
  97.                 --lim;
  98.             }
  99.         }
  100.  
  101.         /*
  102.          * If it's a leaf page, and duplicates aren't allowed, we're
  103.          * done.  If duplicates are allowed, it's possible that there
  104.          * were duplicate keys on duplicate pages, and they were later
  105.          * deleted, so we could be on a page with no matches while
  106.          * there are matches on other pages.  If we're at the start or
  107.          * end of a page, check on both sides.
  108.          */
  109.         if (h->flags & P_BLEAF) {
  110.             t->bt_cur.index = base;
  111.             *exactp = 0;
  112.             if (!ISSET(t, B_NODUPS)) {
  113.                 if (base == 0 &&
  114.                     bt_sprev(t, h, key, exactp))
  115.                     return (&t->bt_cur);
  116.                 if (base == NEXTINDEX(h) &&
  117.                     bt_snext(t, h, key, exactp))
  118.                     return (&t->bt_cur);
  119.             }
  120.             return (&t->bt_cur);
  121.         }
  122.  
  123.         /*
  124.          * No match found.  Base is the smallest index greater than
  125.          * key and may be zero or a last + 1 index.  If it's non-zero,
  126.          * decrement by one, and record the internal page which should
  127.          * be a parent page for the key.  If a split later occurs, the
  128.          * inserted page will be to the right of the saved page.
  129.          */
  130.         index = base ? base - 1 : base;
  131.  
  132. next:        if (__bt_push(t, h->pgno, index) == RET_ERROR)
  133.             return (NULL);
  134.         pg = GETBINTERNAL(h, index)->pgno;
  135.         mpool_put(t->bt_mp, h, 0);
  136.     }
  137. }
  138.  
  139. /*
  140.  * BT_SNEXT -- Check for an exact match after the key.
  141.  *
  142.  * Parameters:
  143.  *    t:    tree to search
  144.  *    h:    current page.
  145.  *    key:    key to find
  146.  *    exactp:    pointer to exact match flag
  147.  *
  148.  * Returns:
  149.  *    If an exact match found.
  150.  */
  151. static int
  152. bt_snext(t, h, key, exactp)
  153.     BTREE *t;
  154.     PAGE *h;
  155.     const DBT *key;
  156.     int *exactp;
  157. {
  158.     EPG e;
  159.     PAGE *tp;
  160.     pgno_t pg;
  161.  
  162.     /* Skip until reach the end of the tree or a key. */
  163.     for (pg = h->nextpg; pg != P_INVALID;) {
  164.         if ((tp = mpool_get(t->bt_mp, pg, 0)) == NULL) {
  165.             mpool_put(t->bt_mp, h, 0);
  166.             return (NULL);
  167.         }
  168.         if (NEXTINDEX(tp) != 0)
  169.             break;
  170.         pg = tp->prevpg;
  171.         mpool_put(t->bt_mp, tp, 0);
  172.     }
  173.     /*
  174.      * The key is either an exact match, or not as good as
  175.      * the one we already have.
  176.      */
  177.     if (pg != P_INVALID) {
  178.         e.page = tp;
  179.         e.index = NEXTINDEX(tp) - 1;
  180.         if (__bt_cmp(t, key, &e) == 0) {
  181.             mpool_put(t->bt_mp, h, 0);
  182.             t->bt_cur = e;
  183.             *exactp = 1;
  184.             return (1);
  185.         }
  186.     }
  187.     return (0);
  188. }
  189.  
  190. /*
  191.  * BT_SPREV -- Check for an exact match before the key.
  192.  *
  193.  * Parameters:
  194.  *    t:    tree to search
  195.  *    h:    current page.
  196.  *    key:    key to find
  197.  *    exactp:    pointer to exact match flag
  198.  *
  199.  * Returns:
  200.  *    If an exact match found.
  201.  */
  202. static int
  203. bt_sprev(t, h, key, exactp)
  204.     BTREE *t;
  205.     PAGE *h;
  206.     const DBT *key;
  207.     int *exactp;
  208. {
  209.     EPG e;
  210.     PAGE *tp;
  211.     pgno_t pg;
  212.  
  213.     /* Skip until reach the beginning of the tree or a key. */
  214.     for (pg = h->prevpg; pg != P_INVALID;) {
  215.         if ((tp = mpool_get(t->bt_mp, pg, 0)) == NULL) {
  216.             mpool_put(t->bt_mp, h, 0);
  217.             return (NULL);
  218.         }
  219.         if (NEXTINDEX(tp) != 0)
  220.             break;
  221.         pg = tp->prevpg;
  222.         mpool_put(t->bt_mp, tp, 0);
  223.     }
  224.     /*
  225.      * The key is either an exact match, or not as good as
  226.      * the one we already have.
  227.      */
  228.     if (pg != P_INVALID) {
  229.         e.page = tp;
  230.         e.index = NEXTINDEX(tp) - 1;
  231.         if (__bt_cmp(t, key, &e) == 0) {
  232.             mpool_put(t->bt_mp, h, 0);
  233.             t->bt_cur = e;
  234.             *exactp = 1;
  235.             return (1);
  236.         }
  237.     }
  238.     return (0);
  239. }
  240.